home *** CD-ROM | disk | FTP | other *** search
/ The Pacifier Press Kit / The Pacifier Press Kit.iso / pc / Program.dxr / Internal_20_Sel_Des_Button.ls < prev    next >
Encoding:
Text File  |  2005-02-15  |  1.1 KB  |  52 lines
  1. global gPhotolist, gImNum, gPKNotes
  2.  
  3. on mouseDown me
  4.   sound(3).play(member("Click"))
  5. end
  6.  
  7. on mouseUp me
  8.   if gPhotolist.count = gImNum then
  9.     gPhotolist = []
  10.     gPKNotes = 0
  11.   else
  12.     gPhotolist = []
  13.     gPhotolist.add("C01")
  14.     gPhotolist.add("C02")
  15.     gPhotolist.add("C03")
  16.     gPhotolist.add("C04")
  17.     gPhotolist.add("C05")
  18.     gPhotolist.add("C06")
  19.     gPhotolist.add("C07")
  20.     gPhotolist.add("C08")
  21.     gPhotolist.add("C09")
  22.     gPhotolist.add("C10")
  23.     gPhotolist.add("C11")
  24.     gPhotolist.add("C12")
  25.     gPhotolist.add("C13")
  26.     gPhotolist.add("C14")
  27.     gPhotolist.add("C15")
  28.     gPhotolist.add("C16")
  29.     gPhotolist.add("C17")
  30.     gPhotolist.add("C18")
  31.     gPhotolist.add("C19")
  32.     gPhotolist.add("C20")
  33.     gPhotolist.add("C21")
  34.     gPhotolist.add("C22")
  35.     gPhotolist.add("C23")
  36.     gPhotolist.add("C24")
  37.     gPhotolist.add("C25")
  38.     gPhotolist.add("C26")
  39.     gPhotolist.add("C27")
  40.     gPhotolist.add("C28")
  41.     gPhotolist.add("C29")
  42.     gPhotolist.add("C30")
  43.     gPhotolist.add("C31")
  44.     gPhotolist.add("TT01")
  45.     gPhotolist.add("TT02")
  46.     gPhotolist.add("TT03")
  47.     gPhotolist.add("vNotes")
  48.     gPKNotes = 1
  49.   end if
  50.   updateStage()
  51. end
  52.